Windows Script (página 2)

Partes: 1, 2, 3

Estructura de VBScript
Estructura general de un programa
Sentencias, líneas continuas, comentarios
Constantes y variables
Operadores
Estructuras de control
Bucles
Funciones y Procedimientos
Clases

Estructura de un Programa
‘ *****************************************
‘ Programa de prueba
‘ Creado: 10/01/2006
‘ *****************************************
‘ declaro variable
Dim mensaje

‘ inicializo la variable
mensaje = “hola, que tal? Estoy aprendiendo a programar en VBScript”

‘ imprimo el mensaje
Wscript.Echo mensaje

‘ **** Fin del programa

Constantes y Variables
Constantes
Const pi = 3.14159, beta = 0.3
Variables
pr = 200
precio = precio + 10
nombre = “Santi”
Declaración explicita (con valor)
Dim precio, iva, precio_total

Constantes y Variables
Array
Dim secuencia(10)
secuencia(0) = 11
Dim matriz(2, 2)
Objetos
Set obj = Wscript.Arguments

Constantes y Variables
Ejemplo 1: Calcular el precio real de dos ordenadores, que cuestan:
1123 euros
1326 euros
Ambos sin iva. El programa debe devolver un mensaje personalizado.

Santi, el precio total del ordenador 1 es: XXX euros
Santi, el precio total del ordenador 2 es: YYY euros

Operadores
Aritméticos
+, -, *, /, (entera), Mod, ^
Lógicos
And, Or, Xor, Imp, Not
Comparación
<, >, =, <=, >=, <>

Precedencia de operador

Estructuras de Control
Condición IF
if condición then
sentencias
elseif condición2 then
sentencias2
else
sentencias3
end if
Condición Case
select case variable
case valor
sentencias
case valor2
sentencias2
case else
sentencias3
end select

Estructuras de Control
Ejemplo 2: Ejecutar un programa que escriba una frase distinta cuando se cumpla una determinada condición, según el siguiente valor:
Valor 1
Valor 2
Otro valor

Bucles
Do while/until
Do…loop while/until
For…Next
For Each…Next
While

Exit Do
Exit For

Do while/until
Do While
do while condición
sentencias
loop

Ejemplo
do while a <= 10
a = a + 1
loop
Do Until
do until condición
sentencias
loop

Ejemplo
do until a > 10
a = a + 1
loop

Do…loop while/until
Do…loop While
do
sentencias
loop while condición

Ejemplo
do
a = a + 1
loop while a <= 10
Do…loop Until
do
sentencias
loop until condición

Ejemplo
do
a = a + 1
loop until a > 10

For (each)…Next
For…Next
For variable = inicio to fin
sentencias
Next

Ejemplo
For i = 1 to 10
a = a + 1
Next
For each…Next
For each variable in seq
sentencias
Next

Ejemplo
For each persona in cola
contador = contador + 1
Next

While
For each…Next
While condición
sentencias
Wend

Ejemplo
Dim value
Value = 1
While value < 10
value = value + 1
Wend

Funciones y Procedimientos
Función
function nombre (parametros)
…
‘ nombre es variable resultado
end function
Ejemplo 3a: Realizar la suma de los 100 primeros números (número triangular)

Funciones y Procedimientos
Procedimiento
sub nombre (parametros)
…
‘ No se retorna valor
end sub
Ejemplo 3b: Realizar la suma de los 100 primeros números (número triangular)

Clases
Formato:
class nombre
declaraciones
funciones o procedimientos
end class

Ejemplo 4: Almacenar los siguientes datos de un comprador:
Nombre
Calle
Código postal
Teléfono

Clases
Atributos publicos y privados
Propiedad get: el usuario me pide atributo “virtual”, que le devuelvo?
Propiedad let: el usuario da valor a un atributo “virtual”, que hago con el?
property get var_virtual property let var_virtual
acciones acciones
end property end property

Ejemplo 5: Se desea tener los siguientes datos de cada unos de los usuarios:
Nombre completo
Correo electrónico
Login
Password

Windows Script Host
Método ECHO
Cuadros de Mensaje
Objeto WScript
Variables de Entorno
Ejecución de programas
Interacción de entrada con el usuario
Creación de accesos directos
Uso de Sistemas de Fichero y Entrada/Salida
Control de Red
Control de Windows y otras aplicaciones

Método ECHO

Wscript.Echo “Hola, Mundo”
Wscript.Echo “Hola, ”, “Mundo”
Wscript.Echo “El precio es ”, precio, _
“ pero se puede rebajar a ”, rebaja

Cuadros de Mensaje
Formato:
MsgBox texto, botones, titulo
Ejemplo:
MsgBox “esto es una prueba”, 0, “prueba”
Posibilidades:
Botones
0: Boton OK
1: Ok y Cancel
2: Abort, Retry y Ignore
3: Yes, No y Cancel
4: Yes y No
5: Retry y Cancel